home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / 80x0393.zip / VCP_DET.ASM < prev    next >
Assembly Source File  |  1992-07-30  |  996b  |  48 lines
  1. comment *
  2.     VCP_DET.ASM
  3.     Purpose:
  4.     To detect if a VCPI host is is currently installed in machine.
  5.  
  6.     Author:
  7.     Yousuf Khan, released to public domain
  8.  
  9.    To run VCP_DET you have link it with EXTFILE.ASM !
  10.    (i.e. tlink /t vcp_det+extfile for Borland)       
  11. *
  12.  
  13.         .model tiny
  14.  
  15.         .data
  16.         cr_lf   equ     13,10
  17.         yes     db      "VCPI driver found, exiting errorlevel 0",cr_lf,"$"
  18.         no      db      "No VCPI driver, exiting errorlevel 255",cr_lf,"$"
  19.  
  20.         .code
  21. extrn   vcpi_detect:near
  22.  
  23.         org     100h
  24.  
  25. start:
  26.         call    vcpi_detect
  27.         push    ax
  28.         cmp     ax, 0
  29.         jne     no_vcpi
  30.         lea     dx, yes
  31.         mov     ah, 9
  32.         int     21h
  33.         pop     ax
  34.         jmp     short eop
  35.  
  36. no_vcpi:
  37.         lea     dx, no
  38.         mov     ah, 9
  39.         int     21h
  40.         pop     ax
  41.  
  42. eop:
  43.         mov     ah, 4ch
  44.         int     21h
  45.         end     start
  46.  
  47. ; EOF VCP_DET.ASM
  48.